Progress Bar displays a Finder-like progress bar that is controlled via Apple Events. It requires System 7 or later.
Sample AppleScript:
tell application "Progress Bar"
make new window with properties {Name: "Counting", Position: {100, 50}}
tell first progress bar of first window
set caption to "Numbers remaining:"
set minimum value to 0
set maximum value to 25
copy 0 to x
repeat while x イ 25
set current value to x
set subcaption to 25 - x
copy x + 1 to x
end repeat
end tell
quit
end tell
Distribution:
Progress Bar is copyrighted, but free, commonly called Freeware. The author retains all rights to the program, but specifically allows redistribution via the following channels:
(1) The disk associated with the book "Tao of AppleScript" by BMUG
(2) Non-commercial bulletin board services
(3) The following commercial BBS's: America Online, CompuServe, AppleLink
(4) Internet archives and file servers
(5) Disk libraries of non-profit organizations
(6) Free exchange between individuals
In all cases, this ReadMe file must accompany the program.
For-profit companies that sell software programs must receive explicit written permission from the author before distributing the program.
Credits:
Written by: Gregory H. Dow
Icons by: Chris Holmes
Useful ideas by: Derrick Schneider and Hans Hansen
ゥ 1993 Gregory H. Dow. All rights reserved.
Send comments to:
Gregory H. Dow
1678 Shattuck Ave #302
Berkeley, CA 94709-1631
America Online: GHD
Internet: ghd@aol.com
・ Version History
1.0 11-Jun-93 Ships with "The Tao of AppleScript" book by BMUG
1.0.1 11-Nov-93 Removed debugging stuff. Application is 12K smaller.